home *** CD-ROM | disk | FTP | other *** search
/ How To Lose A Guy In 10 Days Press Kit / How to Lose a Guy in 10 Days Press Kit.iso / pc / Program.dxr / New Save Image Cast_77_SaveFile Path.ls < prev    next >
Encoding:
Text File  |  2003-01-17  |  916 b   |  36 lines
  1. global gSysPath, gSavePath, gfd, gWinSavePath, gmacSavePath
  2.  
  3. on windowsSaveDialog
  4.   gSavePath = FileSaveAsDialog(gWinSavePath, "How To Lose A Guy Images", "Save Images to what Location ?", 0)
  5.   if gSavePath = EMPTY then
  6.     go("Save")
  7.   else
  8.     the itemDelimiter = "\"
  9.     z = the number of items in gSavePath
  10.     put "How To Lose A Guy Images" into item z of gSavePath
  11.     the itemDelimiter = ","
  12.     save = the itemDelimiter
  13.   end if
  14. end
  15.  
  16. on macSAveDialog
  17.   gSavePath = FileSaveAsDialog(gmacSavePath, "How To Lose A Guy Images", "Save Images to what Location ?")
  18.   if gSavePath = EMPTY then
  19.     go("Save")
  20.   else
  21.     the itemDelimiter = ":"
  22.     z = the number of items in gSavePath
  23.     put "How To Lose A Guy Images" into item z of gSavePath
  24.     the itemDelimiter = ","
  25.     save = the itemDelimiter
  26.   end if
  27. end
  28.  
  29. on exitFrame me
  30.   if gfd = "\" then
  31.     windowsSaveDialog()
  32.   else
  33.     macSAveDialog()
  34.   end if
  35. end
  36.